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File Operations 


Operators are listed in precedence order, from highest to 
lowest. Operators from the same grouping are evaluated 
left to right. 


\ 1 Logical NOT (as a prefix) 
+ Indicates a positive number (as a prefix) 
- Indicates a negative (as a prefix) 


ai Raise to a whole number power 
” Multiply 
/ Divide 
% Integer divide (return integer part) 
Il Remainder divide (return remainder) 
+ Add 

Subtract 
|| (abuttal) | Concatenate (with no space) 
(blank) Concatenate with blank in-between 
== Strictly equal 
a== \== /== Not strictly equal 
>> Strictly greater than 
<< Strictly lesser than 


>>= a<< \<<_ Strictly greater than or equal to 
(strictly not less than) 

<<= >> \>>_ Strictly less than or equal to 
(strictly not greater than) 

= Equal to (also used for assignment) 


a \= /= Not equal to 
<> >< 

> Greater than 

< Less than 

>= a< \< Greater than or equal to 
(not less than) 

<= > \> Less than or equal to 
(not greater than) 

& And (both are true) 

| Or (either is true) 

&& Exclusive Or (either but not both are true) 


Notes: not all systems support all notations (for 
example: 7 ). You can always ensure a higher 
precedence for a clause by enclosing it in 
parentheses: ( ). 


ADDRESS TSO 
ADDRESS ISPEXEC 
ADDRESS ISREDIT 


- send commands to TSO (default) 
- send commands to ISPF 
- for edit macros 


Allocate a new dataset — 
“ALLOC F(ddname) DA(dataset) LIKE(dataset) “ 
"ALLOC F(ddname) DA(dataset) NEW DIR(size) 
SPACE (size, size) DSORG(org) RECFM(format) 
LRECL(size) BLKSIZE(size) " 


Allocate existing datasets -- 
"ALLOC F(ddname) DA(dataset) SHR or OLD [REUSE] “ 


Free dataset(s) -- 
"FREE F(ddname)" or "FREE ALL" 


Process datasets — 
“EXECIO lines or * DISKR or DISKRU or DISKW ddname 
Read parms: ( [OPEN] [FINIS] [SKIP] 
[FIFO] or [LIFO] or [STEM stemvar.] ) 
Write parms: ( [OPEN] [FINIS] [STEM stemvar.] ) 
"EXECIO 0 DISKR my_dd (OPEN "" — opens a dataset 
“EXECIO 0 DISKR my_dd (FINIS “ — closes a dataset 
"EXECIO 100 DISKR my_dd (STEM my_data. " 
— reads first 100 records into my_data array 
“EXECIO * DISKR my_dd (FINIS STEM my_data. “ 
— reads entire dataset into my_data array and closes file 
“EXECIO * DISKW my_dd (FINIS STEM my_data.” 
— write all lines from my_data array and closes file 


DISKR-- read DISKW-- write DISKRU-- update 
lines -- number of records to read or write 

* -- process entire dataset 
FINIS — -- optionally close file after the operation 
STEM _ -- literal prior to compound variable name 
stemvar. -- compound variable to read or write data 


Common TSO commands -- 
“COPY source_dataset destination_dataset" 
"RENAME source_dataset new_dataset_name" 
"DELETE dataset" 
"LISTDS pds_dataset_name MEMBERS " 


Common ISPF commands -- 
"ISPEXEC VIEW dataset " 
"ISPEXEC EDIT dataset" 


"ISPEXEC SAVE " 
"ISPEXEC END " 


Condition Traps 


ERROR Command to external environment indicates error 
FAILURE Command to external environment failed 

HALT External interrupt to the program 

NOVALUE Reference to an unitialized variable 

SYNTAX Syntax or runtime error in the script 


Instructions 


= (assignment) symbol = expression ; 


ADDRESS | environment [ expression ] | 
| [VALUE ] expression | 


ARG [template_list ] — see HINTS on parsing 
| name [expression ] [, [expression ]]... | 
CALL | ON condition [NAME trapname ] 
| OFF condition | 
where condition can be ERROR, FAILURE, or HALT 
DO [repetitor] [ condition ] 
[ instruction_list ] 
END [symbol ] 
where repetitor is: symbol = expri [ TO expression_t ] 
[ BY expression_b ] 
[ FOR expression_f ] 
or: expression_r 
or: FOREVER 


and condition is: WHILE expression_w 
or: UNTIL expression_u 


DROP symbol [symbol ... ] 
EXIT [ expression ] 
IF expression [;] THEN [;] instruction [ ELSE [;] instruction ] 
INTERPRET expression 
ITERATE [symbol ] 
LEAVE [symbol ] 
NOP 
NUMERIC DIGITS [ expression ] 
FORM [ SCIENTIFIC | ENGINEERING | 
[ VALUE ] expression ] 
FUZZ [expression ] 
OPTIONS expression 
PARSE [UPPER] type [template_list] _— see HINTS 
type is: [ ARG | EXTERNAL | NUMERIC | PULL | 
SOURCE | VERSION ] 
or: VALUE [expression ] WITH 
or: VAR_ symbol 


PROCEDURE [ EXPOSE variable list ] 
PULL [ template _list ] — see HINTS on parsing 


PUSH [ expression ] 


QUEUE [expression ] 


RETURN [ expression ] 
SAY [ expression ] 


SELECT ; when_part [when_part...] [ OTHERWISE [5] 
[ instruction_list ...] ] END ; 


when_part is: WHEN expression [;] THEN [;] instruction 


| label_name | 

SIGNAL __ | [ VALUE ] expression | 
| ON condition [NAME trapname ] | 
| 


| OFF condition 


where condition is one of: ERROR, FAILURE, HALT, 
NOVALUE, or SYNTAX 


TRACE number | trace_setting 


where trace_setting can be: 
A-All 
C-- Commands 
E-- Error 
F-- Failure 
I-- Intermediates 
L-- Labels 
N-- Normal 
O-- Off 
R-- Results 
S-- Scan 
?-- Toggles interactive trace On or Off 
! — Inhibits host command execution 
( ? and ! can be followed by a letter from the above list) 
+n -- Skips number of pauses specified by whole number 
-n— Inhibits trace for number of clauses specified 


+-Of-- 
TRACE [string] | [Symbol] | [[value] expression] 


UPPER | variable _list ] 


Syntax 


Symbols include: A-Z,a-z,0-9,@ #$.!?_¢ 
(plus possible DBCS chars.) 


/* REXX */ 1* line of every Rexx program 
; (semi-colon) Statement separator 

, (comma) Continues a line 

 *) Encloses comments 

( ) Enclose function arguments, 


grouping for precedence 
symbol = expression ; Assigns value to variable 


stem.tail Compound variable (tail may be multiple 
simple symbols separated by periods) 

stem.index Simulating arrays with compound variables 

‘abc’ or "abc” Character string notation 

OC’X or “Oc’x Hexadecimal notation 


°0101’b or “0101”B Binary string notation 


Functions 


ABBREV(information, info [,length]) 
ABS(number) 

ADDRESS() 

ARG( [argnum [,option]] ) 
BITAND(string1 [,[string2] [,pad]]) 
BITOR(string1 [,[string2] [,pad]]) 
BITXOR(string1 [,[string2] [,pad]]) 
B2X(binary_string) 
CENTER(string, length [,pad]) 
CENTRE(string, length [,pad]) 
COMPARE(string1, string2 [,pad]) 
CONDITION( [option] ) 
COPIES(string, times) 

C2D(string [,length]) 

C2xX(string) 

DATATYPE(string [,type]) 


DATE( [option_out 
[,date [,option_in]]] ) 


DELSTR(string, start [,length]) 
DELWORD(string, start [,length]) 
DIGITS() 

D2C(integer [,length]) 
D2X(integer [,length]) 
ERRORTEXT(error_no) 
EXTERNALS() 

FIND(string, phrase) 

FORM() 


FORMAT(number [,[before] [,[after] 
L[expp] [,expt]]]]) 


FUZZ() 
INDEX(haystack,needle, [start]) 


INSERT(string, target [,[position] 
Llength] [,pad]]) 


JUSTIFY (string, length [,pad])) 
LASTPOS(needle, haystack [,start]) 
LEFT(string, length [,pad]) 
LENGTH(string) 

LINESIZE() 

MAX(number1 [,number2]...) 
MIN(number1 [,number2]...) 


OVERLAY (string1, string2 [,[start] 
L[length] [,pad]]]) 


POS(needle, haystack [,start]) 
QUEUED() 

RANDOM([min] [,max] [,seed]) 
REVERSE (string) 

RIGHT(string, length [,pad]) 
SIGN(number) 

SOURCELINE( [line_number] ) 
SPACE(string [, [length] [,pad]]) 
STRIP(string [,option] [,char]]) 
SUBSTR(string, start [,[length] [,pad]]) 
SUBWORD(string, start [,length]) 
SYMBOL(name) 

TIME( [option ] ) 

TRACE( [setting] ) 


TRANSLATE(string [,[tableout] 
[,[tablein] [,pad]]]) 


TRUNC(number [,length] ) 


USERID() 


VALUE(symbol [,newvalue] ) 


VERIFY (string, reference [,[option] 
[ start]]) 


WORD(string, wordno) 
WORDINDEX(string, wordno) 
WORDLENGTH(string, wordno) 
WORDPOS(phrase, string [,start]) 
WORDS (string) 

XRANGE ({start] [,end]) 
X2B(hexstring) 

X2C(hexstring) 


X2D(hexstring [,length]) 


Options for Functions 


Date Time Datatype 

B Base C Civil A Alphanumeric 
C Century E Elapsed B Binary 

D Days H Hours C SBCS/DBCS 
E European L Long D DBCS 

J Julian M Minutes L Lowercase 
M Month N Normal M Mixed case 
N Normal R Reset N Number 

O Ordered S Seconds S Symbol 

S Standard U Uppercase 
U USA W Whole # 

W Weekday X Hexadecimal 


Special Variables 


RC — Return code from a command, 
or a SYNTAX error code 

SIGL — Line number of last instruction 
that caused a jump to a label 

RESULT — Set by RETURN in subrtn 


Immediate Commands 
HE — Halt Execution HI — Halt Interpretation 


HT — Half Typing RT — Resume Typing 
TE — Trace End TS — Trace Start 


TSO/E External Functions 


GETMSG(msgstem [,msgtype] [,cart] [,mask] [,time] ) 
LISTDSI( | dataset_name [,location] | 

| filename file 

[,directory] [,multivol] [,racf] [,recall] [,smsinfo] ) 


MSG( [option] ) 


MVSVAR( | arg_name_ | 
| arg_names | ) 
OUTTRAP( | [off] 


| varname [,max] [,concat] [,skipamt] | ) 
PROMPT( [option] ) 
SETLANG( [langcode] ) 
STORAGE( address [,length] [,data] ) 
SYSCPUS(cpus_stem ) 
SYSDSN( dsname ) 
SYSVAR( arg_name ) 


TRAPMSG( [option] ) 


TSO/E Stream Package Functions 


TSO/E Rexx Commands 


DELSTACK 
DROPBUF [n ] 


EXECIO lines | * 
DISKW | DISKR | DISKRU ddname 
read_parms | write_parms 

where read_parms: ( FIFO | LIFO | STEM varname 
[OPEN] [FINIS] [SKIP] ) 

and write_parms: ( [STEM varname] [OPEN] [FINIS] ) 
(write_parms apply to DISKW only) 


EXECUTIL | EXECDD (CLOSE | NOCLOSE) | 
| TS | TE | HT | RT | HI | 
| RENAME NAME (function_name) 

[SYSNAME(sysname)] [DD(sysdd)] | 

| SEARCHDD( YES | NO ) | 

MAKEBUF 

NEWSTACK 

QBUF 

QELEM 

QSTACK 


SUBCOM envname 


Help 


Forum: https://groups.io/g/rexxla-members 


CHARIN([name] [,[start] [,length]]) 
CHAROUT([name] [,[string] [,start]]) 
CHARS( [name] ) LINES( [name] ) 


STREAM(name, operation, command) 


LINEIN([name] [,[line] [,count]]) 


LINEOUT([name] [,[string] [,line]]) 


Websites: www.RexxInfo.org 
www.RexxLA.org 


DBCS Processing Functions 


DBADJUST( string [,operation] ) 
DBBRACKET( string ) 

DBCENTER( string, length [,pad] [,option] ) 
DBCJUSTIFY( string, length [,pad] [,option] ) 
DBLEFT( string, length [,pad] [,option] ) 
DBRIGHT( string, length [,pad] [,option] ) 
DBRLEFT( string, length [,option] ) 
DBRRIGHT( string,length [,option] ) 
DBTODBCS( string ) 

DBTOSBCS( string ) 

DBUNBRACKET( string ) 

DBVALIDATE( string [,’C’] ) 

DBWIDTH( string [,option] ) 


Hints 
Concatenation— apple=’-Apple’ 
say ‘Candy’apple outputs: Candy-Apple 
say ‘Candy’ apple Candy -Apple 
say ‘Candy’ || apple Candy-Apple 
say ‘Candy’ apple Candy -Apple 


Parsing for the ARG, PARSE, and PULL [template] — 
by Words (strings separated by blanks or spaces) 
by Delimiters (delimiters identify input data elements) 
by Numbers (for starting or relative column positions) 
— Periods can be used to skip or exclude data elements 

Examples: phone = '212-855-1212'; sep ="-' ; 

parse var phone area_code (sep) prefix (sep) number 
parse value phone with area_code (sep) prefix (sep) number 
parse var phone area_code 4 5 prefix 8 9 number 
parse value phone with area_code +3 +1 prefix +3 +1 number 
parse var phone 4 sep +1 . 1 area (sep) prefix (sep) number 
parse value phone with . (sep) prefix (sep). |— returns prefix 
parse var phone +8 number — returns number 
parse value phone with =9 number — returns number 


